home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / EARCD / biz / demo / Reflections4De.lha / Ref4Demo / skripte.lha / details.skr < prev    next >
Text File  |  1996-08-10  |  24KB  |  684 lines
  1. REFSKRIPT
  2. OBJ_NEW Details 3
  3. GET_RESULT create_name
  4. ;********Punkte erzeugen************
  5. GEO_new_pt create_name
  6. GET_RESULT res
  7. GEO_SET_PT create_name  res 11.603237 20.384754 -109.447212
  8. PRINT Punkt 0
  9. GEO_new_pt create_name
  10. GET_RESULT res
  11. GEO_SET_PT create_name  res 8.603237 20.384754 -109.447212
  12. GEO_new_pt create_name
  13. GET_RESULT res
  14. GEO_SET_PT create_name  res 8.603237 23.384754 -109.447212
  15. GEO_new_pt create_name
  16. GET_RESULT res
  17. GEO_SET_PT create_name  res 11.603237 23.384754 -109.447212
  18. GEO_new_pt create_name
  19. GET_RESULT res
  20. GEO_SET_PT create_name  res -3.750000 12.749999 -85.000000
  21. GEO_new_pt create_name
  22. GET_RESULT res
  23. GEO_SET_PT create_name  res -8.250000 12.749999 -85.000000
  24. GEO_new_pt create_name
  25. GET_RESULT res
  26. GEO_SET_PT create_name  res -8.250000 17.250000 -85.000000
  27. GEO_new_pt create_name
  28. GET_RESULT res
  29. GEO_SET_PT create_name  res -3.750000 17.250000 -85.000000
  30. GEO_new_pt create_name
  31. GET_RESULT res
  32. GEO_SET_PT create_name  res 11.603237 -20.384758 -109.447212
  33. GEO_new_pt create_name
  34. GET_RESULT res
  35. GEO_SET_PT create_name  res 8.603237 -20.384758 -109.447212
  36. GEO_new_pt create_name
  37. GET_RESULT res
  38. GEO_SET_PT create_name  res 8.603237 -23.384758 -109.447212
  39. GEO_new_pt create_name
  40. GET_RESULT res
  41. GEO_SET_PT create_name  res 11.603237 -23.384758 -109.447212
  42. GEO_new_pt create_name
  43. GET_RESULT res
  44. GEO_SET_PT create_name  res -3.750000 -12.750001 -85.000000
  45. GEO_new_pt create_name
  46. GET_RESULT res
  47. GEO_SET_PT create_name  res -8.250000 -12.750001 -85.000000
  48. GEO_new_pt create_name
  49. GET_RESULT res
  50. GEO_SET_PT create_name  res -8.250000 -17.250000 -85.000000
  51. GEO_new_pt create_name
  52. GET_RESULT res
  53. GEO_SET_PT create_name  res -3.750000 -17.250000 -85.000000
  54. GEO_new_pt create_name
  55. GET_RESULT res
  56. GEO_SET_PT create_name  res -58.761040 20.384754 -106.594795
  57. GEO_new_pt create_name
  58. GET_RESULT res
  59. GEO_SET_PT create_name  res -55.761040 20.384754 -106.594795
  60. GEO_new_pt create_name
  61. GET_RESULT res
  62. GEO_SET_PT create_name  res -55.761040 23.384754 -106.594795
  63. GEO_new_pt create_name
  64. GET_RESULT res
  65. GEO_SET_PT create_name  res -58.761040 23.384754 -106.594795
  66. GEO_new_pt create_name
  67. GET_RESULT res
  68. GEO_SET_PT create_name  res -48.250000 12.749999 -85.000000
  69. GEO_new_pt create_name
  70. GET_RESULT res
  71. GEO_SET_PT create_name  res -43.750000 12.749999 -85.000000
  72. GEO_new_pt create_name
  73. GET_RESULT res
  74. GEO_SET_PT create_name  res -43.750000 17.250000 -85.000000
  75. GEO_new_pt create_name
  76. GET_RESULT res
  77. GEO_SET_PT create_name  res -48.250000 17.250000 -85.000000
  78. GEO_new_pt create_name
  79. GET_RESULT res
  80. GEO_SET_PT create_name  res -58.761040 -20.384758 -106.594795
  81. GEO_new_pt create_name
  82. GET_RESULT res
  83. GEO_SET_PT create_name  res -55.761040 -20.384758 -106.594795
  84. GEO_new_pt create_name
  85. GET_RESULT res
  86. GEO_SET_PT create_name  res -55.761040 -23.384758 -106.594795
  87. GEO_new_pt create_name
  88. GET_RESULT res
  89. GEO_SET_PT create_name  res -58.761040 -23.384758 -106.594795
  90. GEO_new_pt create_name
  91. GET_RESULT res
  92. GEO_SET_PT create_name  res -48.250000 -12.750001 -85.000000
  93. GEO_new_pt create_name
  94. GET_RESULT res
  95. GEO_SET_PT create_name  res -43.750000 -12.750001 -85.000000
  96. GEO_new_pt create_name
  97. GET_RESULT res
  98. GEO_SET_PT create_name  res -43.750000 -17.250000 -85.000000
  99. GEO_new_pt create_name
  100. GET_RESULT res
  101. GEO_SET_PT create_name  res -48.250000 -17.250000 -85.000000
  102. GEO_new_pt create_name
  103. GET_RESULT res
  104. GEO_SET_PT create_name  res -1.000000 -14.000003 -58.999992
  105. GEO_new_pt create_name
  106. GET_RESULT res
  107. GEO_SET_PT create_name  res 0.500000 -14.000003 -58.999992
  108. GEO_new_pt create_name
  109. GET_RESULT res
  110. GEO_SET_PT create_name  res 0.500000 -0.000002 -58.999992
  111. GEO_new_pt create_name
  112. GET_RESULT res
  113. GEO_SET_PT create_name  res 0.500000 13.999998 -58.999992
  114. GEO_new_pt create_name
  115. GET_RESULT res
  116. GEO_SET_PT create_name  res -1.000000 13.999998 -58.999992
  117. GEO_new_pt create_name
  118. GET_RESULT res
  119. GEO_SET_PT create_name  res 0.452877 -14.000003 -58.626957
  120. GEO_new_pt create_name
  121. GET_RESULT res
  122. GEO_SET_PT create_name  res 0.452877 -0.000002 -58.626957
  123. GEO_new_pt create_name
  124. GET_RESULT res
  125. GEO_SET_PT create_name  res 0.452877 13.999998 -58.626957
  126. GEO_new_pt create_name
  127. GET_RESULT res
  128. GEO_SET_PT create_name  res 0.314461 -14.000003 -58.277363
  129. GEO_new_pt create_name
  130. GET_RESULT res
  131. GEO_SET_PT create_name  res 0.314461 -0.000002 -58.277363
  132. GEO_new_pt create_name
  133. GET_RESULT res
  134. GEO_SET_PT create_name  res 0.314461 13.999998 -58.277363
  135. GEO_new_pt create_name
  136. GET_RESULT res
  137. GEO_SET_PT create_name  res 0.093452 -14.000003 -57.973171
  138. GEO_new_pt create_name
  139. GET_RESULT res
  140. GEO_SET_PT create_name  res 0.093452 -0.000002 -57.973171
  141. GEO_new_pt create_name
  142. GET_RESULT res
  143. GEO_SET_PT create_name  res 0.093452 13.999998 -57.973171
  144. GEO_new_pt create_name
  145. GET_RESULT res
  146. GEO_SET_PT create_name  res -0.196259 -14.000003 -57.733501
  147. GEO_new_pt create_name
  148. GET_RESULT res
  149. GEO_SET_PT create_name  res -0.196259 -0.000002 -57.733501
  150. GEO_new_pt create_name
  151. GET_RESULT res
  152. GEO_SET_PT create_name  res -0.196259 13.999998 -57.733501
  153. GEO_new_pt create_name
  154. GET_RESULT res
  155. GEO_SET_PT create_name  res -0.536472 -14.000003 -57.573406
  156. GEO_new_pt create_name
  157. GET_RESULT res
  158. GEO_SET_PT create_name  res -0.536472 -0.000002 -57.573406
  159. GEO_new_pt create_name
  160. GET_RESULT res
  161. GEO_SET_PT create_name  res -0.536472 13.999998 -57.573406
  162. GEO_new_pt create_name
  163. GET_RESULT res
  164. GEO_SET_PT create_name  res -0.905815 -14.000003 -57.502953
  165. GEO_new_pt create_name
  166. GET_RESULT res
  167. GEO_SET_PT create_name  res -0.905815 -0.000002 -57.502953
  168. GEO_new_pt create_name
  169. GET_RESULT res
  170. GEO_SET_PT create_name  res -0.905815 13.999998 -57.502953
  171. GEO_new_pt create_name
  172. GET_RESULT res
  173. GEO_SET_PT create_name  res -1.281071 -14.000003 -57.526562
  174. GEO_new_pt create_name
  175. GET_RESULT res
  176. GEO_SET_PT create_name  res -1.281071 -0.000002 -57.526562
  177. GEO_new_pt create_name
  178. GET_RESULT res
  179. GEO_SET_PT create_name  res -1.281071 13.999998 -57.526562
  180. GEO_new_pt create_name
  181. GET_RESULT res
  182. GEO_SET_PT create_name  res -1.638668 -14.000003 -57.642754
  183. GEO_new_pt create_name
  184. GET_RESULT res
  185. GEO_SET_PT create_name  res -1.638668 -0.000002 -57.642754
  186. GEO_new_pt create_name
  187. GET_RESULT res
  188. GEO_SET_PT create_name  res -1.638668 13.999998 -57.642754
  189. GEO_new_pt create_name
  190. GET_RESULT res
  191. GEO_SET_PT create_name  res -1.956135 -14.000003 -57.844223
  192. GEO_new_pt create_name
  193. GET_RESULT res
  194. GEO_SET_PT create_name  res -1.956135 -0.000002 -57.844223
  195. GEO_new_pt create_name
  196. GET_RESULT res
  197. GEO_SET_PT create_name  res -1.956135 13.999998 -57.844223
  198. GEO_new_pt create_name
  199. GET_RESULT res
  200. GEO_SET_PT create_name  res -2.213524 -14.000003 -58.118313
  201. GEO_new_pt create_name
  202. GET_RESULT res
  203. GEO_SET_PT create_name  res -2.213524 -0.000002 -58.118313
  204. GEO_new_pt create_name
  205. GET_RESULT res
  206. GEO_SET_PT create_name  res -2.213524 13.999998 -58.118313
  207. GEO_new_pt create_name
  208. GET_RESULT res
  209. GEO_SET_PT create_name  res -2.394665 -14.000003 -58.447807
  210. GEO_new_pt create_name
  211. GET_RESULT res
  212. GEO_SET_PT create_name  res -2.394665 -0.000002 -58.447807
  213. GEO_new_pt create_name
  214. GET_RESULT res
  215. GEO_SET_PT create_name  res -2.394665 13.999998 -58.447807
  216. GEO_new_pt create_name
  217. GET_RESULT res
  218. GEO_SET_PT create_name  res -2.488171 -14.000003 -58.811993
  219. GEO_new_pt create_name
  220. GET_RESULT res
  221. GEO_SET_PT create_name  res -2.488171 -0.000002 -58.811993
  222. GEO_new_pt create_name
  223. GET_RESULT res
  224. GEO_SET_PT create_name  res -2.488171 13.999998 -58.811993
  225. GEO_new_pt create_name
  226. GET_RESULT res
  227. GEO_SET_PT create_name  res -2.488171 -14.000003 -59.187992
  228. GEO_new_pt create_name
  229. GET_RESULT res
  230. GEO_SET_PT create_name  res -2.488171 -0.000002 -59.187992
  231. GEO_new_pt create_name
  232. GET_RESULT res
  233. GEO_SET_PT create_name  res -2.488171 13.999998 -59.187992
  234. GEO_new_pt create_name
  235. GET_RESULT res
  236. GEO_SET_PT create_name  res -2.394665 -14.000003 -59.552181
  237. GEO_new_pt create_name
  238. GET_RESULT res
  239. GEO_SET_PT create_name  res -2.394665 -0.000002 -59.552181
  240. GEO_new_pt create_name
  241. GET_RESULT res
  242. GEO_SET_PT create_name  res -2.394665 13.999998 -59.552181
  243. GEO_new_pt create_name
  244. GET_RESULT res
  245. GEO_SET_PT create_name  res -2.213524 -14.000003 -59.881672
  246. GEO_new_pt create_name
  247. GET_RESULT res
  248. GEO_SET_PT create_name  res -2.213524 -0.000002 -59.881672
  249. GEO_new_pt create_name
  250. GET_RESULT res
  251. GEO_SET_PT create_name  res -2.213524 13.999998 -59.881672
  252. GEO_new_pt create_name
  253. GET_RESULT res
  254. GEO_SET_PT create_name  res -1.956135 -14.000003 -60.155762
  255. GEO_new_pt create_name
  256. GET_RESULT res
  257. GEO_SET_PT create_name  res -1.956135 -0.000002 -60.155762
  258. GEO_new_pt create_name
  259. GET_RESULT res
  260. GEO_SET_PT create_name  res -1.956135 13.999998 -60.155762
  261. GEO_new_pt create_name
  262. GET_RESULT res
  263. GEO_SET_PT create_name  res -1.638668 -14.000003 -60.357235
  264. GEO_new_pt create_name
  265. GET_RESULT res
  266. GEO_SET_PT create_name  res -1.638668 -0.000002 -60.357235
  267. GEO_new_pt create_name
  268. GET_RESULT res
  269. GEO_SET_PT create_name  res -1.638668 13.999998 -60.357235
  270. GEO_new_pt create_name
  271. GET_RESULT res
  272. GEO_SET_PT create_name  res -1.281071 -14.000003 -60.473423
  273. GEO_new_pt create_name
  274. GET_RESULT res
  275. GEO_SET_PT create_name  res -1.281071 -0.000002 -60.473423
  276. GEO_new_pt create_name
  277. GET_RESULT res
  278. GEO_SET_PT create_name  res -1.281071 13.999998 -60.473423
  279. GEO_new_pt create_name
  280. GET_RESULT res
  281. GEO_SET_PT create_name  res -0.905811 -14.000003 -60.497032
  282. GEO_new_pt create_name
  283. GET_RESULT res
  284. GEO_SET_PT create_name  res -0.905811 -0.000002 -60.497032
  285. GEO_new_pt create_name
  286. GET_RESULT res
  287. GEO_SET_PT create_name  res -0.905811 13.999998 -60.497032
  288. GEO_new_pt create_name
  289. GET_RESULT res
  290. GEO_SET_PT create_name  res -0.536472 -14.000003 -60.426579
  291. GEO_new_pt create_name
  292. GET_RESULT res
  293. GEO_SET_PT create_name  res -0.536472 -0.000002 -60.426579
  294. GEO_new_pt create_name
  295. GET_RESULT res
  296. GEO_SET_PT create_name  res -0.536472 13.999998 -60.426579
  297. GEO_new_pt create_name
  298. GET_RESULT res
  299. GEO_SET_PT create_name  res -0.196259 -14.000003 -60.266483
  300. GEO_new_pt create_name
  301. GET_RESULT res
  302. GEO_SET_PT create_name  res -0.196259 -0.000002 -60.266483
  303. GEO_new_pt create_name
  304. GET_RESULT res
  305. GEO_SET_PT create_name  res -0.196259 13.999998 -60.266483
  306. GEO_new_pt create_name
  307. GET_RESULT res
  308. GEO_SET_PT create_name  res 0.093452 -14.000003 -60.026814
  309. PRINT Punkt 100
  310. GEO_new_pt create_name
  311. GET_RESULT res
  312. GEO_SET_PT create_name  res 0.093452 -0.000002 -60.026814
  313. GEO_new_pt create_name
  314. GET_RESULT res
  315. GEO_SET_PT create_name  res 0.093452 13.999998 -60.026814
  316. GEO_new_pt create_name
  317. GET_RESULT res
  318. GEO_SET_PT create_name  res 0.314461 -14.000003 -59.722622
  319. GEO_new_pt create_name
  320. GET_RESULT res
  321. GEO_SET_PT create_name  res 0.314461 -0.000002 -59.722622
  322. GEO_new_pt create_name
  323. GET_RESULT res
  324. GEO_SET_PT create_name  res 0.314461 13.999998 -59.722622
  325. GEO_new_pt create_name
  326. GET_RESULT res
  327. GEO_SET_PT create_name  res 0.452877 -14.000003 -59.373028
  328. GEO_new_pt create_name
  329. GET_RESULT res
  330. GEO_SET_PT create_name  res 0.452877 -0.000002 -59.373028
  331. GEO_new_pt create_name
  332. GET_RESULT res
  333. GEO_SET_PT create_name  res 0.452877 13.999998 -59.373028
  334. GEO_new_pt create_name
  335. GET_RESULT res
  336. GEO_SET_PT create_name  res -4.477921 -22.000000 -113.896149
  337. GEO_new_pt create_name
  338. GET_RESULT res
  339. GEO_SET_PT create_name  res 6.960850 -22.000000 -110.269218
  340. GEO_new_pt create_name
  341. GET_RESULT res
  342. GEO_SET_PT create_name  res 6.960850 22.000000 -110.269218
  343. GEO_new_pt create_name
  344. GET_RESULT res
  345. GEO_SET_PT create_name  res -4.477921 22.000000 -113.896149
  346. GEO_new_pt create_name
  347. GET_RESULT res
  348. GEO_SET_PT create_name  res -5.384651 -22.000000 -111.036461
  349. GEO_new_pt create_name
  350. GET_RESULT res
  351. GEO_SET_PT create_name  res 6.054115 -22.000000 -107.409531
  352. GEO_new_pt create_name
  353. GET_RESULT res
  354. GEO_SET_PT create_name  res 6.054115 22.000000 -107.409531
  355. GEO_new_pt create_name
  356. GET_RESULT res
  357. GEO_SET_PT create_name  res -5.384651 22.000000 -111.036461
  358. GEO_new_pt create_name
  359. GET_RESULT res
  360. GEO_SET_PT create_name  res -20.852369 -22.000000 -114.999939
  361. GEO_new_pt create_name
  362. GET_RESULT res
  363. GEO_SET_PT create_name  res -8.894993 -22.000000 -113.989410
  364. GEO_new_pt create_name
  365. GET_RESULT res
  366. GEO_SET_PT create_name  res -8.894993 22.000000 -113.989410
  367. GEO_new_pt create_name
  368. GET_RESULT res
  369. GEO_SET_PT create_name  res -20.852369 22.000000 -114.999939
  370. GEO_new_pt create_name
  371. GET_RESULT res
  372. GEO_SET_PT create_name  res -21.105000 -22.000000 -112.010597
  373. GEO_new_pt create_name
  374. GET_RESULT res
  375. GEO_SET_PT create_name  res -9.147625 -22.000000 -111.000069
  376. GEO_new_pt create_name
  377. GET_RESULT res
  378. GEO_SET_PT create_name  res -9.147625 22.000000 -111.000069
  379. GEO_new_pt create_name
  380. GET_RESULT res
  381. GEO_SET_PT create_name  res -21.105000 22.000000 -112.010597
  382. GEO_new_pt create_name
  383. GET_RESULT res
  384. GEO_SET_PT create_name  res -37.098076 -22.000000 -114.031258
  385. GEO_new_pt create_name
  386. GET_RESULT res
  387. GEO_SET_PT create_name  res -25.134048 -22.000000 -114.959763
  388. GEO_new_pt create_name
  389. GET_RESULT res
  390. GEO_SET_PT create_name  res -25.134048 22.000000 -114.959763
  391. GEO_new_pt create_name
  392. GET_RESULT res
  393. GEO_SET_PT create_name  res -37.098076 22.000000 -114.031258
  394. GEO_new_pt create_name
  395. GET_RESULT res
  396. GEO_SET_PT create_name  res -36.865952 -22.000000 -111.040253
  397. GEO_new_pt create_name
  398. GET_RESULT res
  399. GEO_SET_PT create_name  res -24.901922 -22.000000 -111.968758
  400. GEO_new_pt create_name
  401. GET_RESULT res
  402. GEO_SET_PT create_name  res -24.901922 22.000000 -111.968758
  403. GEO_new_pt create_name
  404. GET_RESULT res
  405. GEO_SET_PT create_name  res -36.865952 22.000000 -111.040253
  406. GEO_new_pt create_name
  407. GET_RESULT res
  408. GEO_SET_PT create_name  res -53.166451 -22.000000 -109.525673
  409. GEO_new_pt create_name
  410. GET_RESULT res
  411. GEO_SET_PT create_name  res -41.782246 -22.000000 -113.320396
  412. GEO_new_pt create_name
  413. GET_RESULT res
  414. GEO_SET_PT create_name  res -41.782246 22.000000 -113.320396
  415. GEO_new_pt create_name
  416. GET_RESULT res
  417. GEO_SET_PT create_name  res -53.166451 22.000000 -109.525673
  418. GEO_new_pt create_name
  419. GET_RESULT res
  420. GEO_SET_PT create_name  res -52.217758 -22.000000 -106.679626
  421. GEO_new_pt create_name
  422. GET_RESULT res
  423. GEO_SET_PT create_name  res -40.833561 -22.000000 -110.474350
  424. GEO_new_pt create_name
  425. GET_RESULT res
  426. GEO_SET_PT create_name  res -40.833561 22.000000 -110.474350
  427. GEO_new_pt create_name
  428. GET_RESULT res
  429. GEO_SET_PT create_name  res -52.217758 22.000000 -106.679626
  430.  
  431. ;********Dreiecke erzeugen************
  432. DREI_NEW_DREI create_name 1 0 4
  433. PRINT Dreieck 0 : 1 0 4
  434. DREI_NEW_DREI create_name 1 4 5
  435. DREI_NEW_DREI create_name 4 0 3
  436. DREI_NEW_DREI create_name 4 3 7
  437. DREI_NEW_DREI create_name 2 1 6
  438. DREI_NEW_DREI create_name 6 1 5
  439. DREI_NEW_DREI create_name 3 2 7
  440. DREI_NEW_DREI create_name 7 2 6
  441. DREI_NEW_DREI create_name 5 4 7
  442. DREI_NEW_DREI create_name 5 7 6
  443. DREI_NEW_DREI create_name 0 1 3
  444. DREI_NEW_DREI create_name 3 1 2
  445. DREI_NEW_DREI create_name 8 9 12
  446. DREI_NEW_DREI create_name 12 9 13
  447. DREI_NEW_DREI create_name 8 12 11
  448. DREI_NEW_DREI create_name 11 12 15
  449. DREI_NEW_DREI create_name 9 10 14
  450. DREI_NEW_DREI create_name 9 14 13
  451. DREI_NEW_DREI create_name 10 11 15
  452. DREI_NEW_DREI create_name 10 15 14
  453. DREI_NEW_DREI create_name 12 13 15
  454. DREI_NEW_DREI create_name 15 13 14
  455. DREI_NEW_DREI create_name 9 8 11
  456. DREI_NEW_DREI create_name 9 11 10
  457. DREI_NEW_DREI create_name 16 17 20
  458. DREI_NEW_DREI create_name 20 17 21
  459. DREI_NEW_DREI create_name 16 20 19
  460. DREI_NEW_DREI create_name 19 20 23
  461. DREI_NEW_DREI create_name 17 18 22
  462. DREI_NEW_DREI create_name 17 22 21
  463. DREI_NEW_DREI create_name 18 19 23
  464. DREI_NEW_DREI create_name 18 23 22
  465. DREI_NEW_DREI create_name 20 21 23
  466. DREI_NEW_DREI create_name 23 21 22
  467. DREI_NEW_DREI create_name 17 16 19
  468. DREI_NEW_DREI create_name 17 19 18
  469. DREI_NEW_DREI create_name 25 24 28
  470. DREI_NEW_DREI create_name 25 28 29
  471. DREI_NEW_DREI create_name 28 24 27
  472. DREI_NEW_DREI create_name 28 27 31
  473. DREI_NEW_DREI create_name 26 25 30
  474. DREI_NEW_DREI create_name 30 25 29
  475. DREI_NEW_DREI create_name 27 26 31
  476. DREI_NEW_DREI create_name 31 26 30
  477. DREI_NEW_DREI create_name 29 28 31
  478. DREI_NEW_DREI create_name 29 31 30
  479. DREI_NEW_DREI create_name 24 25 27
  480. DREI_NEW_DREI create_name 27 25 26
  481. DREI_NEW_DREI create_name 33 37 32
  482. DREI_NEW_DREI create_name 33 34 37 1
  483. DREI_NEW_DREI create_name 34 38 37 1
  484. DREI_NEW_DREI create_name 34 35 38 1
  485. DREI_NEW_DREI create_name 35 39 38 1
  486. DREI_NEW_DREI create_name 35 36 39
  487. DREI_NEW_DREI create_name 37 40 32
  488. DREI_NEW_DREI create_name 37 38 40 1
  489. DREI_NEW_DREI create_name 38 41 40 1
  490. DREI_NEW_DREI create_name 38 39 41 1
  491. DREI_NEW_DREI create_name 39 42 41 1
  492. DREI_NEW_DREI create_name 39 36 42
  493. DREI_NEW_DREI create_name 40 43 32
  494. DREI_NEW_DREI create_name 40 41 43 1
  495. DREI_NEW_DREI create_name 41 44 43 1
  496. DREI_NEW_DREI create_name 41 42 44 1
  497. DREI_NEW_DREI create_name 42 45 44 1
  498. DREI_NEW_DREI create_name 42 36 45
  499. DREI_NEW_DREI create_name 43 46 32
  500. DREI_NEW_DREI create_name 43 44 46 1
  501. DREI_NEW_DREI create_name 44 47 46 1
  502. DREI_NEW_DREI create_name 44 45 47 1
  503. DREI_NEW_DREI create_name 45 48 47 1
  504. DREI_NEW_DREI create_name 45 36 48
  505. DREI_NEW_DREI create_name 46 49 32
  506. DREI_NEW_DREI create_name 46 47 49 1
  507. DREI_NEW_DREI create_name 47 50 49 1
  508. DREI_NEW_DREI create_name 47 48 50 1
  509. DREI_NEW_DREI create_name 48 51 50 1
  510. DREI_NEW_DREI create_name 48 36 51
  511. DREI_NEW_DREI create_name 49 52 32
  512. DREI_NEW_DREI create_name 49 50 52 1
  513. DREI_NEW_DREI create_name 50 53 52 1
  514. DREI_NEW_DREI create_name 50 51 53 1
  515. DREI_NEW_DREI create_name 51 54 53 1
  516. DREI_NEW_DREI create_name 51 36 54
  517. DREI_NEW_DREI create_name 52 55 32
  518. DREI_NEW_DREI create_name 52 53 55 1
  519. DREI_NEW_DREI create_name 53 56 55 1
  520. DREI_NEW_DREI create_name 53 54 56 1
  521. DREI_NEW_DREI create_name 54 57 56 1
  522. DREI_NEW_DREI create_name 54 36 57
  523. DREI_NEW_DREI create_name 55 58 32
  524. DREI_NEW_DREI create_name 55 56 58 1
  525. DREI_NEW_DREI create_name 56 59 58 1
  526. DREI_NEW_DREI create_name 56 57 59 1
  527. DREI_NEW_DREI create_name 57 60 59 1
  528. DREI_NEW_DREI create_name 57 36 60
  529. DREI_NEW_DREI create_name 58 61 32
  530. DREI_NEW_DREI create_name 58 59 61 1
  531. DREI_NEW_DREI create_name 59 62 61 1
  532. DREI_NEW_DREI create_name 59 60 62 1
  533. DREI_NEW_DREI create_name 60 63 62 1
  534. PRINT Dreieck 100 : 60 63 62
  535. DREI_NEW_DREI create_name 60 36 63
  536. DREI_NEW_DREI create_name 61 64 32
  537. DREI_NEW_DREI create_name 61 62 64 1
  538. DREI_NEW_DREI create_name 62 65 64 1
  539. DREI_NEW_DREI create_name 62 63 65 1
  540. DREI_NEW_DREI create_name 63 66 65 1
  541. DREI_NEW_DREI create_name 63 36 66
  542. DREI_NEW_DREI create_name 64 67 32
  543. DREI_NEW_DREI create_name 64 65 67 1
  544. DREI_NEW_DREI create_name 65 68 67 1
  545. DREI_NEW_DREI create_name 65 66 68 1
  546. DREI_NEW_DREI create_name 66 69 68 1
  547. DREI_NEW_DREI create_name 66 36 69
  548. DREI_NEW_DREI create_name 67 70 32
  549. DREI_NEW_DREI create_name 67 68 70 1
  550. DREI_NEW_DREI create_name 68 71 70 1
  551. DREI_NEW_DREI create_name 68 69 71 1
  552. DREI_NEW_DREI create_name 69 72 71 1
  553. DREI_NEW_DREI create_name 69 36 72
  554. DREI_NEW_DREI create_name 70 73 32
  555. DREI_NEW_DREI create_name 70 71 73 1
  556. DREI_NEW_DREI create_name 71 74 73 1
  557. DREI_NEW_DREI create_name 71 72 74 1
  558. DREI_NEW_DREI create_name 72 75 74 1
  559. DREI_NEW_DREI create_name 72 36 75
  560. DREI_NEW_DREI create_name 73 76 32
  561. DREI_NEW_DREI create_name 73 74 76 1
  562. DREI_NEW_DREI create_name 74 77 76 1
  563. DREI_NEW_DREI create_name 74 75 77 1
  564. DREI_NEW_DREI create_name 75 78 77 1
  565. DREI_NEW_DREI create_name 75 36 78
  566. DREI_NEW_DREI create_name 76 79 32
  567. DREI_NEW_DREI create_name 76 77 79 1
  568. DREI_NEW_DREI create_name 77 80 79 1
  569. DREI_NEW_DREI create_name 77 78 80 1
  570. DREI_NEW_DREI create_name 78 81 80 1
  571. DREI_NEW_DREI create_name 78 36 81
  572. DREI_NEW_DREI create_name 79 82 32
  573. DREI_NEW_DREI create_name 79 80 82 1
  574. DREI_NEW_DREI create_name 80 83 82 1
  575. DREI_NEW_DREI create_name 80 81 83 1
  576. DREI_NEW_DREI create_name 81 84 83 1
  577. DREI_NEW_DREI create_name 81 36 84
  578. DREI_NEW_DREI create_name 82 85 32
  579. DREI_NEW_DREI create_name 82 83 85 1
  580. DREI_NEW_DREI create_name 83 86 85 1
  581. DREI_NEW_DREI create_name 83 84 86 1
  582. DREI_NEW_DREI create_name 84 87 86 1
  583. DREI_NEW_DREI create_name 84 36 87
  584. DREI_NEW_DREI create_name 85 88 32
  585. DREI_NEW_DREI create_name 85 86 88 1
  586. DREI_NEW_DREI create_name 86 89 88 1
  587. DREI_NEW_DREI create_name 86 87 89 1
  588. DREI_NEW_DREI create_name 87 90 89 1
  589. DREI_NEW_DREI create_name 87 36 90
  590. DREI_NEW_DREI create_name 88 91 32
  591. DREI_NEW_DREI create_name 88 89 91 1
  592. DREI_NEW_DREI create_name 89 92 91 1
  593. DREI_NEW_DREI create_name 89 90 92 1
  594. DREI_NEW_DREI create_name 90 93 92 1
  595. DREI_NEW_DREI create_name 90 36 93
  596. DREI_NEW_DREI create_name 91 94 32
  597. DREI_NEW_DREI create_name 91 92 94 1
  598. DREI_NEW_DREI create_name 92 95 94 1
  599. DREI_NEW_DREI create_name 92 93 95 1
  600. DREI_NEW_DREI create_name 93 96 95 1
  601. DREI_NEW_DREI create_name 93 36 96
  602. DREI_NEW_DREI create_name 94 97 32
  603. DREI_NEW_DREI create_name 94 95 97 1
  604. DREI_NEW_DREI create_name 95 98 97 1
  605. DREI_NEW_DREI create_name 95 96 98 1
  606. DREI_NEW_DREI create_name 96 99 98 1
  607. DREI_NEW_DREI create_name 96 36 99
  608. DREI_NEW_DREI create_name 97 100 32
  609. DREI_NEW_DREI create_name 97 98 100 1
  610. DREI_NEW_DREI create_name 98 101 100 1
  611. DREI_NEW_DREI create_name 98 99 101 1
  612. DREI_NEW_DREI create_name 99 102 101 1
  613. DREI_NEW_DREI create_name 99 36 102
  614. DREI_NEW_DREI create_name 100 103 32
  615. DREI_NEW_DREI create_name 100 101 103 1
  616. DREI_NEW_DREI create_name 101 104 103 1
  617. DREI_NEW_DREI create_name 101 102 104 1
  618. DREI_NEW_DREI create_name 102 105 104 1
  619. DREI_NEW_DREI create_name 102 36 105
  620. DREI_NEW_DREI create_name 103 106 32
  621. DREI_NEW_DREI create_name 103 104 106 1
  622. DREI_NEW_DREI create_name 104 107 106 1
  623. DREI_NEW_DREI create_name 104 105 107 1
  624. DREI_NEW_DREI create_name 105 108 107 1
  625. DREI_NEW_DREI create_name 105 36 108
  626. DREI_NEW_DREI create_name 106 33 32
  627. DREI_NEW_DREI create_name 106 107 33 1
  628. DREI_NEW_DREI create_name 107 34 33 1
  629. DREI_NEW_DREI create_name 107 108 34 1
  630. DREI_NEW_DREI create_name 108 35 34 1
  631. DREI_NEW_DREI create_name 108 36 35
  632. DREI_NEW_DREI create_name 109 110 113
  633. DREI_NEW_DREI create_name 113 110 114
  634. DREI_NEW_DREI create_name 109 113 112
  635. PRINT Dreieck 200 : 109 113 112
  636. DREI_NEW_DREI create_name 112 113 116
  637. DREI_NEW_DREI create_name 110 111 115
  638. DREI_NEW_DREI create_name 110 115 114
  639. DREI_NEW_DREI create_name 111 112 116
  640. DREI_NEW_DREI create_name 111 116 115
  641. DREI_NEW_DREI create_name 113 114 116
  642. DREI_NEW_DREI create_name 116 114 115
  643. DREI_NEW_DREI create_name 110 109 112
  644. DREI_NEW_DREI create_name 110 112 111
  645. DREI_NEW_DREI create_name 117 118 121
  646. DREI_NEW_DREI create_name 121 118 122
  647. DREI_NEW_DREI create_name 117 121 120
  648. DREI_NEW_DREI create_name 120 121 124
  649. DREI_NEW_DREI create_name 118 119 123
  650. DREI_NEW_DREI create_name 118 123 122
  651. DREI_NEW_DREI create_name 119 120 124
  652. DREI_NEW_DREI create_name 119 124 123
  653. DREI_NEW_DREI create_name 121 122 124
  654. DREI_NEW_DREI create_name 124 122 123
  655. DREI_NEW_DREI create_name 118 117 120
  656. DREI_NEW_DREI create_name 118 120 119
  657. DREI_NEW_DREI create_name 125 126 129
  658. DREI_NEW_DREI create_name 129 126 130
  659. DREI_NEW_DREI create_name 125 129 128
  660. DREI_NEW_DREI create_name 128 129 132
  661. DREI_NEW_DREI create_name 126 127 131
  662. DREI_NEW_DREI create_name 126 131 130
  663. DREI_NEW_DREI create_name 127 128 132
  664. DREI_NEW_DREI create_name 127 132 131
  665. DREI_NEW_DREI create_name 129 130 132
  666. DREI_NEW_DREI create_name 132 130 131
  667. DREI_NEW_DREI create_name 126 125 128
  668. DREI_NEW_DREI create_name 126 128 127
  669. DREI_NEW_DREI create_name 133 134 137
  670. DREI_NEW_DREI create_name 137 134 138
  671. DREI_NEW_DREI create_name 133 137 136
  672. DREI_NEW_DREI create_name 136 137 140
  673. DREI_NEW_DREI create_name 134 135 139
  674. DREI_NEW_DREI create_name 134 139 138
  675. DREI_NEW_DREI create_name 135 136 140
  676. DREI_NEW_DREI create_name 135 140 139
  677. DREI_NEW_DREI create_name 137 138 140
  678. DREI_NEW_DREI create_name 140 138 139
  679. DREI_NEW_DREI create_name 134 133 136
  680. DREI_NEW_DREI create_name 134 136 135
  681.  
  682. PRINT fertig
  683. RETURN 1
  684.